home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / DJGPP / GCC257S6.ZIP / src / gcc-257 / va-mips.h < prev    next >
C/C++ Source or Header  |  1993-05-15  |  2KB  |  70 lines

  1. /* ---------------------------------------- */
  2. /*           VARARGS  for MIPS/GNU CC       */
  3. /*                                          */
  4. /*                                          */
  5. /*                                          */
  6. /*                                          */
  7. /* ---------------------------------------- */
  8.  
  9.  
  10. /* These macros implement varargs for GNU C--either traditional or ANSU.  */
  11.  
  12. /* Define __gnuc_va_list.  */
  13.  
  14. #ifndef __GNUC_VA_LIST
  15. #define __GNUC_VA_LIST
  16. typedef char * __gnuc_va_list;
  17. #endif /* not __GNUC_VA_LIST */
  18.  
  19. /* If this is for internal libc use, don't define anything but
  20.    __gnuc_va_list.  */
  21. #if defined (_STDARG_H) || defined (_VARARGS_H)
  22.  
  23. /* In GCC version 2, we want an ellipsis at the end of the declaration
  24.    of the argument list.  GCC version 1 can't parse it.  */
  25.  
  26. #if __GNUC__ > 1
  27. #define __va_ellipsis ...
  28. #else
  29. #define __va_ellipsis
  30. #endif
  31.  
  32. #define __va_rounded_size(__TYPE)  \
  33.   (((sizeof (__TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
  34.  
  35. #ifdef _STDARG_H
  36. #define va_start(__AP, __LASTARG)                         \
  37.  (__AP = ((char *) &(__LASTARG) + __va_rounded_size (__LASTARG)))
  38.  
  39. #else
  40. #define va_alist  __builtin_va_alist
  41. #define va_dcl    int __builtin_va_alist; __va_ellipsis
  42. #define va_start(__AP)  __AP = (char *) &__builtin_va_alist
  43. #endif
  44.  
  45. #ifndef va_end
  46. void va_end (__gnuc_va_list);        /* Defined in libgcc.a */
  47. #endif
  48. #define va_end(__AP)
  49.  
  50. /* We cast to void * and then to TYPE * because this avoids
  51.    a warning about increasing the alignment requirement.  */
  52. #ifdef __MIPSEB__
  53. /* For big-endian machines.  */
  54. #define va_arg(__AP, __type)                    \
  55.   ((__AP = (char *) ((__alignof__ (__type) > 4            \
  56.               ? ((int)__AP + 8 - 1) & -8        \
  57.               : ((int)__AP + 4 - 1) & -4)        \
  58.              + __va_rounded_size (__type))),        \
  59.    *(__type *) (void *) (__AP - __va_rounded_size (__type)))
  60. #else
  61. /* For little-endian machines.  */
  62. #define va_arg(__AP, __type)                            \
  63.   ((__type *) (void *) (__AP = (char *) ((__alignof__(__type) > 4        \
  64.                       ? ((int)__AP + 8 - 1) & -8        \
  65.                       : ((int)__AP + 4 - 1) & -4)        \
  66.                      + __va_rounded_size(__type))))[-1]
  67. #endif
  68.  
  69. #endif /* defined (_STDARG_H) || defined (_VARARGS_H) */
  70.